home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / internet / miami_dodatki / miamionoff / rexx / miamionline.rexx < prev   
OS/2 REXX Batch file  |  1996-12-15  |  431b  |  32 lines
  1. /*
  2. **  Miami online - arexx script for Miami TCP/IP
  3. **
  4. **  $VER: MiamiOnline 1.1 (9.11.96)
  5. **
  6. **  By Kenneth C. Nilsen (kennecni@IDGonline.no)
  7. **
  8. */
  9.  
  10. options results
  11.  
  12. if ~show('p', 'MIAMI.1') then do
  13.     address command
  14.     "run <>nil: tools:miami/miami"      /* NOTE: Change this path! */
  15.     "WaitForPort MIAMI.1"
  16. end
  17.  
  18. address 'MIAMI.1'
  19.  
  20. ISONLINE
  21. if RC=1 then exit 5
  22.  
  23. ONLINE
  24.  
  25. ISONLINE
  26. if RC=0 then exit 5
  27.  
  28. ISONLINE
  29. if RC=1 then hide
  30.  
  31. exit 0
  32.